home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 February: Tool Chest / Dev.CD Feb 94.toast / Tool Chest / Development Platforms / Apple II / Essentials / MPW IIGS Interfaces / PIIGSIncludes / Windows.p < prev   
Encoding:
Text File  |  1993-06-15  |  16.5 KB  |  446 lines  |  [TEXT/MPS ]

  1. {********************************************
  2. ; File: Windows.p
  3. ;
  4. ;
  5. ; Copyright Apple Computer, Inc. 1986-93
  6. ; All Rights Reserved
  7. ;
  8. ********************************************}
  9.  
  10. UNIT WINDOWS;
  11. INTERFACE
  12. USES TYPES,QUICKDRAW,EVENTS,CONTROLS;
  13. CONST
  14.  
  15.  
  16. { Error Codes }
  17. paramLenErr = $0E01;  { first word of parameter list is the wrong size }
  18. allocateErr = $0E02;  { unable to allocate window record }
  19. taskMaskErr = $0E03;  { reserved bits are not clear in wmTaskMask }
  20. compileTooLarge = $0E04;  { Compiled text is larger than 64 KB }
  21. cantUpdateErr = $0E05;  { window couldn't be updated }
  22.  
  23. { Axis Parameters }
  24. wNoConstraint = $0000;  { No constraint on movement. }
  25. wHAxisOnly = $0001;  { Horizontal axis only. }
  26. wVAxisOnly = $0002;  { Vertical axis only. }
  27.  
  28. { Desktop Command Codes }
  29. FromDesk = $00;  { Subtract region from desktop }
  30. ToDesk = $1;  { Add region to desktop }
  31. GetDesktop = $2;  { Get Handle of Desktop region }
  32. SetDesktop = $3;  { Set Handle of Desktop region }
  33. GetDeskPat = $4;  { Address of  pattern or drawing routine }
  34. SetDeskPat = $5;  { Change Address of  pattern or drawing routine }
  35. GetVisDesktop = $6;  { Get destop region less visible windows. }
  36. BackGroundRgn = $7;  { For drawing directly on desktop. }
  37. CheckForNewDeskMsg = $8; { force rechecking message #2 }
  38.  
  39. { SendBehind Values }
  40. toBottom = $FFFFFFFE;  { To send window to bottom. }
  41. topMost = $FFFFFFFF;  { To make window top. }
  42. bottomMost = $0000;  { To make window bottom. }
  43.  
  44. { Task Masks }
  45. tmMenuKey = $00000001;
  46. tmUpdate = $00000002;
  47. tmFindW = $00000004;
  48. tmMenuSel = $0008;
  49. tmOpenNDA = $0010;
  50. tmSysClick = $0020;
  51. tmDragW = $0040;
  52. tmContent = $0080;
  53. tmClose = $0100;
  54. tmZoom = $0200;
  55. tmGrow = $0400;
  56. tmScroll = $0800;
  57. tmSpecial = $1000;
  58. tmCRedraw = $2000;
  59. tmInactive = $4000;
  60. tmInfo = $8000;
  61. tmContentControls = $00010000;
  62. tmControlKey = $00020000;
  63. tmControlMenu = $00040000;
  64. tmMultiClick = $00080000;
  65. tmIdleEvents = $00100000;
  66.  
  67. { TaskMaster Codes }
  68. wNoHit = $0000;  { retained for back compatibility.  }
  69. inNull = $0000;  { retained for back compatibility }
  70. inKey = $0003;  { retained for back compatibility }
  71. inButtDwn = $0001;  { retained for back compatibility }
  72. inUpdate = $0006;  { retained for back compatibility }
  73. wInDesk = $0010;  { On Desktop }
  74. wInMenuBar = $0011;  { On system menu bar }
  75. wClickCalled = $0012;  { system click called }
  76. wInContent = $0013;  { In content region }
  77. wInDrag = $0014;  { In drag region }
  78. wInGrow = $0015;  { In grow region, active window only }
  79. wInGoAway = $0016;  { In go-away region, active window only }
  80. wInZoom = $0017;  { In zoom region, active window only }
  81. wInInfo = $0018;  { In information bar }
  82. wInSpecial = $0019;  { Item ID selected was 250 - 255 }
  83. wInDeskItem = $001A;  { Item ID selected was 1 - 249 }
  84. wInFrame = $1B;  { in Frame, but not on anything else }
  85. wInactMenu = $1C;  { 'selection' of inactive menu item }
  86. wClosedNDA = $001D;  { desk accessory closed }
  87. wCalledSysEdit = $001E;  { inactive menu item selected }
  88. wInSysWindow = $8000;  { hi bit set for system windows }
  89.  
  90. { VarCode }
  91. wDraw = $00;  { Draw window frame command. }
  92. wHit = $01;  { Hit test command. }
  93. wCalcRgns = $02;  { Compute regions command. }
  94. wNew = $03;  { Initialization command. }
  95. wDispose = $04;  { Dispose command. }
  96. wGetDrag = 5;        { Return address of outline drawing handler }
  97. wGrowFrame = 6;    { Draw outline of window being resized }
  98. wRecSize = 7;        { Return size of additional space neeed in the windrec }
  99. wPos = 8;            { Return RECT that is the window's portRect }
  100. wBehind = 9;        { Return where the window should be placed in the list }
  101. wCallDefProc = 10;    { Generic call to the defproc }
  102.  
  103. { WFrame }
  104. fHilited = $0001;  { Window is highlighted. }
  105. fZoomed = $0002;  { Window is zoomed. }
  106. fAllocated = $0004;  { Window record was allocated. }
  107. fCtlTie = $0008;  { Window state tied to controls. }
  108. fInfo = $0010;  { Window has an information bar. }
  109. fVis = $0020;  { Window is visible. }
  110. fQContent = $0040;
  111. fMove = $0080;  { Window is movable. }
  112. fZoom = $0100;  { Window is zoomable. }
  113. fFlex = $0200;
  114. fGrow = $0400;  { Window has grow box. }
  115. fBScroll = $0800;  { Window has horizontal scroll bar. }
  116. fRScroll = $1000;  { Window has vertical scroll bar. }
  117. fAlert = $2000;
  118. fClose = $4000;  { Window has a close box. }
  119. fTitle = $8000;  { Window has a title bar. }
  120.  
  121. { DoModalWindow flag values }
  122. mwMovable = $8000;
  123. mwUpdateAll = $4000;
  124. mwDeskAcc = $0010;
  125. mwIBeam = $0008;
  126. mwMenuKey = $0004;
  127. mwMenuSelect = $0002;
  128. mwNoScrapForLE = $0001;
  129.  
  130. { UpdateWindow flag values }
  131. uwBackground = $8000;
  132. uwGSOSnotAvail = $4000;
  133.  
  134. { HandleDiskInsert flag values (bit flags) }
  135. hdiScan = $8000;
  136. hdiHandle = $4000;
  137. hdiUpdate = $2000;
  138. hdiReportEjects = $1000;
  139. hdiNoDelay = $0800;
  140. hdiDupDisk = $0400;
  141. hdiCheckTapeDrives = $0200;
  142. hdiUnreadable = $0100;
  143. hdiMarkOffline = $0001;
  144.  
  145. { HandleDiskInsert result flag values (bit flags) }
  146. hdiFormatted = $0002;
  147. hdiEjection = $0001;
  148.  
  149. { constants for AlertWindow alertFlags }
  150. awCString = $0000;
  151. awPString = $0001;
  152. awPointer = $0000;
  153. awHandle = $0002;
  154. awResource = $0004;
  155. awTextFullWidth = $0008;
  156. awForceBeep = $0010;
  157. awButtonLayout = $0020;
  158. awNoDevScan = $0040;
  159. awNoDisposeRes = $0080;
  160. awWatchForDisk = $0100;
  161. awIconIsResource = $0200;
  162. awFullColor = $0400;
  163.  
  164. { Other Constants }
  165. windSize = $00D4;  { Size of WindRec. }
  166. wmTaskRecSize = $002E;  { Size of WmTaskRec. }
  167. wTrackZoom = $001F;
  168. wHitFrame = $0020;
  169. wInControl = $0021;
  170. wInControlMenu = $0022;
  171.  
  172. { custom defproc dRequest codes (from TN #42) }
  173. wSetOrgMask = 0;
  174. wSetMaxGrow = 1;
  175. wSetScroll = 2;
  176. wSetPage = 3;
  177. wSetInfoRefCon = 4;
  178. wSetInfoDraw = 5;
  179. wSetOrigin = 6;
  180. wSetDataSize = 7;
  181. wSetZoomRect = 8;
  182. wSetTitle = 9;
  183. wSetColorTable = 10;
  184. wSetFrameFlag = 11;
  185. wGetOrgMask = 12;
  186. wGetMaxGrow = 13;
  187. wGetScroll = 14;
  188. wGetPage = 15;
  189. wGetInfoRefCon = 16;
  190. wGetInfoDraw = 17;
  191. wGetOrigin = 18;
  192. wGetDataSize = 19;
  193. wGetZoomRect = 20;
  194. wGetTitle = 21;
  195. wGetColorTable = 22;
  196. wGetFrameFlag = 23;
  197. wGetInfoRect = 24;
  198. wGetDrawInfo = 25;
  199. wGetStartInfoDraw = 26;
  200. wGetEndInfoDraw = 27;
  201. wZoomWindow = 28;
  202. wStartDrawing = 29;
  203. wStartMove = 30;
  204. wStartGrow = 31;
  205. wNewSize = 32;
  206. wTask = 33;
  207.  
  208. TYPE
  209. WmTaskRec = EventRecord ;
  210.  
  211.  
  212. WmTaskRecPtr = EventRecordPtr ;
  213.  
  214. WindColorHndl = ^WindColorPtr;
  215. WindColorPtr = ^WindColor;
  216. WindColor = RECORD
  217.     frameColor : Integer; { Color of window frame. }
  218.     titleColor : Integer; { Color of title and bar. }
  219.     tBarColor : Integer; { Color/pattern of title bar. }
  220.     growColor : Integer; { Color of grow box. }
  221.     infoColor : Integer; { Color of information bar. }
  222. END;
  223. WindRecPtr = ^WindRec;
  224. WindRec = RECORD
  225.     { wNext : WindRecPtr; Not part of record returned by Toolbox calls }
  226.     port : GrafPort; { Window's port }
  227.     wDefProc : ProcPtr;
  228.     wRefCon : Longint;
  229.     wContDraw : ProcPtr;
  230.     wReserved : Longint; { Space for future expansion }
  231.     wStrucRgn : RegionHndl; { Region of frame plus content. }
  232.     wContRgn : RegionHndl; { Content region. }
  233.     wUpdateRgn : RegionHndl; { Update region. }
  234.     wControls : CtlRecHndl; { Window's control list. }
  235.     wFrameCtrls : CtlRecHndl; { Window frame's control list. }
  236.     wFrame : Integer;
  237. END;
  238. ParamListHndl = ^ParamListPtr;
  239. ParamListPtr = ^ParamList;
  240. ParamList = RECORD
  241.     paramLength : Integer; { Parameter to NewWindow.  }
  242.     wFrameBits : Integer; { Parameter to NewWindow. }
  243.     wTitle : Ptr; { Parameter to NewWindow. }
  244.     wRefCon : Longint; { Parameter to NewWindow. }
  245.     wZoom : Rect; { Parameter to NewWindow. }
  246.     wColor : WindColorPtr; { Parameter to NewWindow. }
  247.     wYOrigin : Integer; { Parameter to NewWindow. }
  248.     wXOrigin : Integer; { Parameter to NewWindow. }
  249.     wDataH : Integer; { Parameter to NewWindow. }
  250.     wDataW : Integer; { Parameter to NewWindow. }
  251.     wMaxH : Integer; { Parameter to NewWindow. }
  252.     wMaxW : Integer; { Parameter to NewWindow. }
  253.     wScrollVer : Integer; { Parameter to NewWindow. }
  254.     wScrollHor : Integer; { Parameter to NewWindow. }
  255.     wPageVer : Integer; { Parameter to NewWindow. }
  256.     wPageHor : Integer; { Parameter to NewWindow. }
  257.     wInfoRefCon : Longint; { Parameter to NewWindow. }
  258.     wInfoHeight : Integer; { height of information bar }
  259.     wFrameDefProc : LongProcPtr; { Parameter to NewWindow. }
  260.     wInfoDefProc : VoidProcPtr; { Parameter to NewWindow. }
  261.     wContDefProc : VoidProcPtr; { Parameter to NewWindow. }
  262.     wPosition : Rect; { Parameter to NewWindow. }
  263.     wPlane : WindowPtr; { Parameter to NewWindow. }
  264.     wStorage : WindRecPtr; { Parameter to NewWindow. }
  265. END;
  266.  
  267. WindParam1Hndl = ^WindParam1Ptr;
  268. WindParam1Ptr = ^WindParam1;
  269. WindParam1 = RECORD
  270.     p1Length : Integer;
  271.     p1Frame : Integer;
  272.     p1Title : Ptr;
  273.     p1RefCon : Longint;
  274.     p1ZoomRect : Rect;
  275.     p1ColorTable : WindColorPtr;
  276.     p1YOrigin : Integer;
  277.     p1XOrigin : Integer;
  278.     p1DataHeight : Integer;
  279.     p1DataWidth : Integer;
  280.     p1MaxHeight : Integer;
  281.     p1MaxWidth : Integer;
  282.     p1VerScroll : Integer;
  283.     p1HorScroll : Integer;
  284.     p1VerPage : Integer;
  285.     p1HorPage : Integer;
  286.     p1InfoText : Longint;
  287.     p1InfoHeight : Integer;
  288.     p1DefProc : LongProcPtr;
  289.     p1InfoDraw : VoidProcPtr;
  290.     p1ContentDraw : VoidProcPtr;
  291.     p1Position : Rect;
  292.     p1Plane : WindowPtr;
  293.     p1ControlList : Longint;
  294.     p1InDesc : Integer;
  295. END;
  296.  
  297. DeskMessageRecordPtr = ^DeskMessageRecord;
  298. DeskMessageRecord = RECORD
  299.     reserved : Longint;
  300.     messageType : Integer;
  301.     drawType : Integer;
  302. END;
  303.  
  304. AuxWindInfoPtr = ^AuxWindInfoRecord;
  305. AuxWindInfoRecord = RECORD
  306.     recordSize: integer;
  307.         reservedForBank: integer;
  308.         reservedForDP: integer;
  309.         reservedForResApp: integer;
  310.         reservedForUpdateHandle: longint;
  311.         reservedForEndUpdatePort: longint;
  312.         reservedForWindoidLayer: longint;
  313.         sysWindMinHeight: integer;
  314.         sysWindMinWidth: integer;
  315.         NDASysWindPtr: ptr;
  316. END;
  317.  
  318. WindGlobalsRecHndl = ^WindGlobalsRecPtr;
  319. WindGlobalsRecPtr = ^WindGlobalsRec;
  320. WindGlobalsRec = RECORD
  321.     lineW : Integer;
  322.     titleHeight : Integer;
  323.     titleYPos : Integer;
  324.     closeHeight : Integer;
  325.     closeWidth : Integer;
  326.     defWindClr : Longint;
  327.     windIconFont : Longint;
  328.     screenMode : Integer;
  329.     pattern : Array [1..32] of Byte;
  330.     callerDPage : Integer;
  331.     callerDataB : Integer;
  332. End;
  333.  
  334. FUNCTION AlertWindow ( alertFlags:Integer; subStrPtr:Ptr; alertStrRef:Ref) : Integer ;
  335. PROCEDURE BeginUpdate ( theWindowPtr:WindowPtr);
  336. PROCEDURE BringToFront ( theWindowPtr:WindowPtr);
  337. FUNCTION CheckUpdate ( theEventPtr:EventRecordPtr) : Boolean;
  338. PROCEDURE CloseWindow ( theWindowPtr:WindowPtr);
  339. FUNCTION CompileText ( subType:Integer; subStringsPtr:Ptr; srcStringPtr:Ptr; srcSize:Integer) : Handle ;
  340. FUNCTION Desktop ( deskTopOP:Integer; dtParam:Longint) : Ptr;
  341. PROCEDURE DragWindow ( grid:Integer; startX:Integer; startY:Integer; grace:Integer; boundsRectPtr:RectPtr; theWindowPtr:WindowPtr)  ;
  342. PROCEDURE DrawInfoBar ( theWindowPtr:WindowPtr);
  343. PROCEDURE EndFrameDrawing;
  344. PROCEDURE EndInfoDrawing;
  345. PROCEDURE EndUpdate ( theWindowPtr:WindowPtr);
  346. FUNCTION ErrorWindow ( subType:Integer; subStringPtr:Ptr; errNum:Integer) : Integer;
  347. FUNCTION FindWindow (VAR theWindowPtr:WindowPtr; pointX:Integer; pointY:Integer) : Integer;
  348. FUNCTION FrontWindow  : WindowPtr;
  349. PROCEDURE GDRPrivate;
  350. FUNCTION GetContentDraw ( theWindowPtr:WindowPtr) : VoidProcPtr;
  351. FUNCTION GetContentOrigin ( theWindowPtr:WindowPtr) : Point;
  352. FUNCTION  GetContentRgn ( theWindowPtr:WindowPtr) : RegionHndl;
  353. FUNCTION GetDataSize ( theWindowPtr:WindowPtr) : Longint;
  354. FUNCTION GetDefProc ( theWindowPtr:WindowPtr) : LongProcPtr;
  355. FUNCTION GetFirstWindow  : WindowPtr;
  356. PROCEDURE GetFrameColor (VAR colorPtr:WindColor; theWindowPtr:WindowPtr);
  357. FUNCTION GetInfoDraw ( theWindowPtr:WindowPtr) : VoidProcPtr;
  358. FUNCTION GetInfoRefCon ( theWindowPtr:WindowPtr) : Longint;
  359. FUNCTION GetMaxGrow ( theWindowPtr:WindowPtr) : Longint;
  360. FUNCTION GetNextWindow ( theWindowPtr:WindowPtr) : WindowPtr;
  361. FUNCTION GetPage ( theWindowPtr:WindowPtr) : Longint;
  362. PROCEDURE GetRectInfo (VAR infoRectPtr:Rect; theWindowPtr:WindowPtr);
  363. FUNCTION GetScroll ( theWindowPtr:WindowPtr) : Longint;
  364. FUNCTION  GetStructRgn ( theWindowPtr:WindowPtr) : RegionHndl;
  365. FUNCTION GetSysWFlag ( theWindowPtr:WindowPtr) : Boolean;
  366. FUNCTION  GetUpdateRgn ( theWindowPtr:WindowPtr) : RegionHndl;
  367. FUNCTION GetWControls ( theWindowPtr:WindowPtr) : CtlRecHndl;
  368. FUNCTION GetWFrame ( theWindowPtr:WindowPtr) : Integer;
  369. FUNCTION GetWKind ( theWindowPtr:WindowPtr) : Integer;
  370. FUNCTION GetWMgrPort  : WindowPtr;
  371. FUNCTION GetWRefCon ( theWindowPtr:WindowPtr) : Longint ;
  372. FUNCTION GetWTitle ( theWindowPtr:WindowPtr) : Ptr ;
  373. FUNCTION GetWindowMgrGlobals  : Ptr ;
  374. FUNCTION GetZoomRect ( theWindowPtr:WindowPtr) : RectPtr ;
  375. FUNCTION GrowWindow ( minWidth:Integer; minHeight:Integer; startX:Integer; startY:Integer; theWindowPtr:WindowPtr) : Longint ;
  376. PROCEDURE HideWindow ( theWindowPtr:WindowPtr)  ;
  377. PROCEDURE HiliteWindow ( fHiliteFlag:Boolean; theWindowPtr:WindowPtr)  ;
  378. PROCEDURE InvalRect ( badRectPtr:Rect)  ;
  379. PROCEDURE InvalRgn ( badRgnHandle:RegionHndl)  ;
  380. PROCEDURE MoveWindow ( newX:Integer; newY:Integer; theWindowPtr:WindowPtr)  ;
  381. FUNCTION NewWindow ( theParamListPtr:ParamList) : WindowPtr ;
  382. FUNCTION NewWindow2 ( titlePtr:StringPtr; refCon:Longint; contentDrawPtr:ProcPtr; defProcPtr:ProcPtr; paramTableDesc:RefDescriptor; paramTableRef:Ref; resourceType:Integer) : WindowPtr ;
  383. FUNCTION PinRect ( theXPt:Integer; theYPt:Integer; theRectPtr:Rect) : Point ;
  384. PROCEDURE RefreshDesktop ( redrawRect:RectPtr)  ;
  385. PROCEDURE ResizeWindow ( hiddenFlag:Boolean; newRectPtr:Rect; theWindowPtr:WindowPtr)  ;
  386. PROCEDURE SelectWindow ( theWindowPtr:WindowPtr)  ;
  387. PROCEDURE SendBehind ( behindWindowPtr:WindowPtr; theWindowPtr:WindowPtr)  ;
  388. PROCEDURE SetContentDraw ( contentDrawPtr:VoidProcPtr; theWindowPtr:WindowPtr)  ;
  389. PROCEDURE SetContentOrigin ( xOrigin:Integer; yOrigin:Integer; theWindowPtr:WindowPtr)  ;
  390. PROCEDURE SetContentOrigin2 ( scrollFlag:Integer; xOrigin:Integer; yOrigin:Integer; theWindowPtr:WindowPtr)  ;
  391. PROCEDURE SetDataSize ( dataWidth:Integer; dataHeight:Integer; theWindowPtr:WindowPtr)  ;
  392. PROCEDURE SetDefProc ( wDefProcPtr:LongProcPtr; theWindowPtr:WindowPtr)  ;
  393. PROCEDURE SetFrameColor ( newColorPtr:WindColorPtr; theWindowPtr:WindowPtr)  ;
  394. PROCEDURE SetInfoDraw ( infoRecCon:VoidProcPtr; theWindowPtr:WindowPtr)  ;
  395. PROCEDURE SetInfoRefCon ( infoRefCon:Longint; theWindowPtr:WindowPtr)  ;
  396. PROCEDURE SetMaxGrow ( maxWidth:Integer; maxHeight:Integer; theWindowPtr:WindowPtr)  ;
  397. PROCEDURE SetOriginMask ( originMask:Integer; theWindowPtr:WindowPtr)  ;
  398. PROCEDURE SetPage ( hPage:Integer; vPage:Integer; theWindowPtr:WindowPtr)  ;
  399. PROCEDURE SetScroll ( hScroll:Integer; vScroll:Integer; theWindowPtr:WindowPtr)  ;
  400. PROCEDURE SetSysWindow ( theWindowPtr:WindowPtr)  ;
  401. PROCEDURE SetWFrame ( wFrame:Integer; theWindowPtr:WindowPtr)  ;
  402. PROCEDURE SetWRefCon ( wRefCon:Longint; theWindowPtr:WindowPtr)  ;
  403. PROCEDURE SetWTitle ( title:Str255; theWindowPtr:WindowPtr)  ;
  404. FUNCTION SetWindowIcons ( newFontHandle:FontHndl) : FontHndl ;
  405. PROCEDURE SetZoomRect ( wZoomSizePtr:Rect; theWindowPtr:WindowPtr)  ;
  406. PROCEDURE ShowHide ( showFlag:Boolean; theWindowPtr:WindowPtr)  ;
  407. PROCEDURE ShowWindow ( theWindowPtr:WindowPtr)  ;
  408. PROCEDURE SizeWindow ( newWidth:Integer; newHeight:Integer; theWindowPtr:WindowPtr)  ;
  409. PROCEDURE StartDrawing ( theWindowPtr:WindowPtr)  ;
  410. PROCEDURE StartFrameDrawing ( theWindowPtr:WindowPtr)  ;
  411. PROCEDURE StartInfoDrawing (VAR infoRectPtr:Rect; theWindowPtr:WindowPtr)  ;
  412. FUNCTION TaskMaster ( taskMask:Integer; taskRecPtr:WmTaskRec) : Integer ;
  413. PROCEDURE TaskMasterContent   ;
  414. FUNCTION TaskMasterDA ( eventMask:Integer; taskRecPtr:WmTaskRecPtr) : Integer ;
  415. PROCEDURE TaskMasterKey   ;
  416. FUNCTION TrackGoAway ( startX:Integer; startY:Integer; theWindowPtr:WindowPtr) : Boolean ;
  417. FUNCTION TrackZoom ( startX:Integer; startY:Integer; theWindowPtr:WindowPtr) : Boolean ;
  418. PROCEDURE ValidRect ( goodRectPtr:Rect)  ;
  419. PROCEDURE ValidRgn ( goodRgnHandle:RegionHndl)  ;
  420. PROCEDURE WindBootInit   ;
  421. FUNCTION WindDragRect ( actionProcPtr:VoidProcPtr; dragPatternPtr:Pattern; startX:Integer; startY:Integer; dragRectPtr:Rect; limitRectPtr:Rect; slopRectPtr:Rect; dragFlag:Integer) : Longint ;
  422. PROCEDURE WindNewRes   ;
  423. PROCEDURE WindReset   ;
  424. PROCEDURE WindShutDown   ;
  425. PROCEDURE WindStartUp ( userID:Integer)  ;
  426. FUNCTION WindStatus  : Boolean ;
  427. FUNCTION WindVersion  : Integer ;
  428. FUNCTION WindowGlobal ( WindowGlobalMask:Integer) : Integer ;
  429. PROCEDURE ZoomWindow ( theWindowPtr:WindowPtr)  ;
  430.  
  431. FUNCTION GetAuxWindInfo(w: WindowPtr): AuxWindInfoPtr;
  432. FUNCTION DoModalWindow(var event:wmTaskRec; updateProc:VoidProcPtr; evHook:VoidProcPtr;
  433.                        beepProc:VoidProcPtr; flags:integer): longint;
  434. FUNCTION MWGetCtlPart: integer;
  435. FUNCTION SetMenuProc(newProc:VoidProcPtr):VoidProcPtr;
  436. PROCEDURE MWStdDrawProc;
  437. PROCEDURE MWSetUpEditMenu;
  438. FUNCTION FindCursorCtl(var foundCtl:CtlRecHndl; x, y:integer; theWindow:WindowPtr): integer;
  439. PROCEDURE ResizeInfoBar(flags:integer; newHeight:integer; theWindow:WindowPtr);
  440. FUNCTION HandleDiskInsert(flags, devNum:integer): longint;
  441. PROCEDURE UpdateWindow (flags:integer; theWindowPtr:WindowPtr);
  442.   INLINE $A2,$6C0E,$22,$E10000,$8F,'_toolErr';
  443.  
  444. IMPLEMENTATION
  445. END.
  446.